home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
001
/
xtalkv11.arc
/
DIRMGA01.XTS
< prev
next >
Wrap
Text File
|
1985-07-17
|
6KB
|
222 lines
LAbel GAM01
CLear
SCreen T
MEssage
*══════════════════════════════════════════════════════════════════════*
* NAME OF STATE NPA/OF /STA/TE /GOE/S H/ERE *
*══════════════════════════════════════════════════════════════════════*
* S BBS/ADDRESS SYSOP NAME/VOICE BBS SETUP REQ'TS R *
*══════════════════════════════════════════════════════════════════════*
│ A: NAME OF BBS SYSOP NAME MODEM PARM-EMUL TYP │
│ CITY WHERE LOCATED VOICE PHONE - OP HRS 404-447-9410 BBS S/W│
│ │
│ B: │
│ │
│ │
│ C: │
│ │
│ │
│ D: │
│ │
│ │
│ E: │
│ │
*══════════════════════════════════════════════════════════════════════*
* P-XTALK / Q-XDOS / R-RESTART SCRIPT / S-PREV MENU / T-NEXT MENU *
* U-RETURN TO STATE SELECTIONS *
*══════════════════════════════════════════════════════════════════════*
.
LAbel GAQ01-A
ASk Enter CHOICE:
IF A,B,C,D,E SKip GAD01-@
IF P,Q,R,S,T SKip GAD01-@
IF U SKip GAD01-@
LAbel GAX01
CLear
MEssage
*══════════════════════════════════════════════════════════════════════*
* A MENU HAS NOT BEEN SETUP FOR THAT BBS YET - PRESS ENTER TO CON'T *
*══════════════════════════════════════════════════════════════════════*
.
ALarm 2 now
WAit echo
JUmp GAM01
;
LAbel GAD01-A
Nu 1(404)447-9410
Na NAME OF BBS
Skip DIAL
;
LAbel GAD01-B
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX01
;
LAbel GAD01-C
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX01
;
LAbel GAD01-D
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX01
;
LAbel GAD01-E
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX01
;
LAbel GAD01-P
JUmp RETXTALK
;
LAbel GAD01-Q
JUmp XDOS
;
LAbel GAD01-R
rwind
;
LAbel GAD01-S
JUmp GAM01
;
LAbel GAD01-T
JUmp GAM02
;
LAbel GAD01-U
JUmp DIRMRETN
;
LAbel GAM02
CLear
MEssage
*══════════════════════════════════════════════════════════════════════*
* NAME OF STATE NPA/OF /STA/TE /GOE/S H/ERE *
*══════════════════════════════════════════════════════════════════════*
* S BBS/ADDRESS SYSOP NAME/VOICE BBS SETUP REQ'TS R *
*══════════════════════════════════════════════════════════════════════*
│ A: NAME OF BBS SYSOP NAME MODEM PARM-EMUL TYP │
│ CITY WHERE LOCATED VOICE PHONE - OP HRS BBS PHONE # BBS S/W│
│ │
│ B: │
│ │
│ │
│ C: │
│ │
│ │
│ D: │
│ │
│ │
│ E: │
│ │
*══════════════════════════════════════════════════════════════════════*
* P-XTALK / Q-XDOS / R-RESTART SCRIPT / S-PREV MENU / T-NEXT MENU *
* U-RETURN TO STATE SELECTIONS *
*══════════════════════════════════════════════════════════════════════*
.
LAbel GAQ02-A
ASk Enter CHOICE:
IF A,B,C,D,E SKip GAD02-@
IF P,Q,R,S,T,U SKip GAD02-@
LAbel STX02
CLear
MEssage
*══════════════════════════════════════════════════════════════════════*
* A MENU HAS NOT BEEN SETUP FOR THAT BBS YET - PRESS ENTER TO CON'T *
*══════════════════════════════════════════════════════════════════════*
.
ALarm 3 now
WAit echo
JUmp GAM02
;
LAbel GAD02-A
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX02
;
LAbel GAD02-B
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX02
;
LAbel GAD02-C
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX02
;
LAbel GAD02-D
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX02
;
LAbel GAD02-E
Nu 1(NPA)NNX-LINE
Na NAME OF BBS
;Skip DIAL --- DELETE SKIP GAX01 ONCE NU/NA IS UPDATED
SKip GAX02
;
LAbel GAD02-P
JUmp RETXTALK
LAbel GAD02-Q
JUmp XDOS
LAbel GAD02-R
RWind
LAbel GAD02-S
JUmp GAM01
LAbel GAD02-T
JUmp GAM01
LAbel GAD02-U
JUmp DIRMRETN
;
LAbel XDOS
CLear
SCreen s
XDOS
;
LAbel RESET
CLear
SCreen s
LOad std
Label RETXTALK
CLear
SCreen S
ABORT
;
Label DIAL
CLear
SCreen S
AL 2
MEssage
██ ██ ██ ██ ██ ██ ██ ██ DIALING ██ ██ ██ ██ ██ ██ ██ ██
.
GO R3/35
WAit quiet 10
reply |
SCreen T
JUmp CONNECT
;
LAbel DIRMRETN
CLear
LOad DIRMENU
;
LAbel CONNECT
AL 3